Hip Tissue/Hip Tissue - Disc 1.iso/pc/dir/menu.dxr/00006_UI- ÉÅÉìÉoÅ[ÇÃì¸ÇÍë÷ǶÅiÉçÅ[ÉãÉIÅ[ÉoÅ[Åj.ls

Text File | 1997-11-06 | 2.0 KB | 40 lines

property standardImage, alternateImage, nextCM

on mouseEnter me
  set the member of sprite the spriteNum of me to the alternateImage of me
end

on mouseLeave me
  set the member of sprite the spriteNum of me to the standardImage of me
end

on beginSprite me
  set the standardImage of me to the member of sprite the spriteNum of me
  if nextCM = 1 then
    set memref to the member of sprite the currentSpriteNum
    set castLibNum to the castLibNum of memref
    set memdefault to member (the memberNum of member memref + 1) of castLib castLibNum
    set alternateImage to memdefault
  end if
end

on getPropertyDescriptionList
  if the currentSpriteNum = 0 then
    set memdefault to 0
  else
    set memref to the member of sprite the currentSpriteNum
    set castLibNum to the castLibNum of memref
    set memdefault to member (the memberNum of member memref + 1) of castLib castLibNum
  end if
  set p_list to [#nextCM: [#comment: "ﾃｳﾃ療‡ﾃε嘉…ﾃ嘉ｬﾃ頴ﾃ…[ﾃ‡ﾂ敕ｩgﾃｳp:", #format: #boolean, #default: 1], #alternateImage: [#comment: "ﾃ鵜ﾃ嘉嘉厩ﾃ曳ﾃ嘉…ﾃ嘉ｬﾃ頴ﾃ…[ﾃ‡ﾂ敕ｩwﾃｭﾃ‹:", #format: #graphic, #default: memdefault]]
  return p_list
end

on getBehaviorDescription
  return "ﾃ厭ﾃ右ﾃ厩ﾃ榎ﾃ韻ﾃ嘉ｬﾃ運ﾃ‡邃｢ﾃ厩ﾃ益ﾃ嘉｢ﾃ韻ﾃ曳ﾃｳﾃε ﾃ甘ｬ窶｡ﾃ‡窶ｦﾃ‡窶 ﾃ‡ﾃ暗､窶佚②ﾃ鵜ﾃ嘉嘉厩ﾃ曳ﾃ嘉…ﾃ嘉ｬﾃ頴ﾃ…[ﾃ‡ﾂ敕ｬﾂｸﾃ‡ﾃ催ｫﾃｷﾃ‡ﾂｶﾃ‡ﾃ暗詠ﾃ駅ﾃ韻ﾃ詠ﾃ陰ﾃ‡ﾂｼﾃ‡ﾃ敕③ﾃ榎ﾃ韻ﾃ嘉ｬﾃ運ﾃ‡邃｢ﾃｳﾃε ﾃ甘､Oﾃ‡窶ｦﾃｨoﾃ‡ﾃ暗‡ﾃ静②ﾃ･ﾅｽﾃ‡ﾃε鵜ﾃ嘉嘉厩ﾃ曳ﾃ嘉…ﾃ嘉ｬﾃ頴ﾃ…[ﾃ‡窶ｦﾃｱﾂﾃ‡ﾃ凝‡窶ｹﾃ‡ﾃ敕③ﾃｯ¥ﾃｩﾂｶﾃ‡ﾃεｪﾃｿﾃ‡ﾃ凝ｫﾃｷﾃ‡ﾂｶﾃ‡ﾂ敕ｧsﾃ‡ﾂ｢ﾃ‡ﾃｽﾃ‡ﾂ｢ﾃ厩ﾃ益ﾃ嘉｢ﾃ韻ﾃ曳ﾃ‡窶ｦﾃ栄ﾃ嘉｢ﾃ叡ﾃ碓ﾃ‡ﾂｵﾃ‡ﾆ津ｩgﾃｳpﾃ‡ﾂｵﾃ‡ﾆ津‡ﾂ催‡ﾃｦﾃ‡ﾅｽﾃ‡ﾂ｢ﾃ③" & RETURN & RETURN & "ﾃ⒃ﾃ英ﾃ嘉｢ﾃ嘉…ﾃ…[ﾃ運ﾃ⒄" & RETURN & "窶｢ ﾃｳﾃ療‡ﾃε嘉…ﾃ嘉ｬﾃ頴ﾃ…[ﾃ‡ﾂ敕ｩgﾃｳp: ﾃ･ﾂｪﾃｧsﾃ‡ﾃε鵜ﾃ嘉嘉厩ﾃ曳ﾃ嘉…ﾃ嘉ｬﾃ頴ﾃ…[ﾃ‡ﾃεｳﾃ療⑿ﾃ鵜ﾃ嘉嘉厩ﾃ曳ﾃｮ窶佚ｧﾃœ +1 ﾃ⒀ﾃ‡ﾃε嘉…ﾃ嘉ｬﾃ頴ﾃ…[ﾃ‡ﾃ静ｬﾂｸﾃ‡ﾃ催ｫﾃｷﾃ‡ﾂｶﾃ‡ﾃ暗③" & RETURN & "窶｢ ﾃ鵜ﾃ嘉嘉厩ﾃ曳ﾃ嘉…ﾃ嘉ｬﾃ頴ﾃ…[ﾃ‡ﾂ敕ｩwﾃｭﾃ‹: ﾃｬﾂｸﾃ‡ﾃ催ｫﾃｷﾃ‡ﾂｶﾃ‡ﾃ暗嘉…ﾃ嘉ｬﾃ頴ﾃ…[ﾃ‡ﾂ敕ｩwﾃｭﾃ凝③ﾃ…uﾃｳﾃ療‡ﾃε嘉…ﾃ嘉ｬﾃ頴ﾃ…[ﾃ‡ﾂ敕ｩgﾃｳpﾃ…vﾃ‡窶ｦﾃｪ窶ｺﾃｭﾃ凝‡ﾅｽﾃ‡ﾃ催‡ﾆ津‡ﾂ｢ﾃ‡ﾃ暗ｨﾃ催ｧﾃ｡ﾃ‡ﾃ陛ｱﾅｽﾃｩﾃ｣ﾃ‡ﾅｽﾃ‡ﾃ催‡ﾃ暗③"
end

on mouseUp
  go(1, "naked")
end